perm filename FORMAT.LST[P,JRA] blob
sn#443535 filedate 1979-05-19 generic text, type T, neo UTF8
1) FORMAT[J,RED] and 2) FORMAT[LSP,JRA] 5-19-79 07:39 pages 1,1
**** File 1) FORMAT[J,RED], Page 1 line 5
1) C00013 00003 .FOOTSEP ← "________________"
1) C00014 ENDMK
**** File 2) FORMAT[LSP,JRA], Page 1 line 5
2) C00013 00003 .TURN ON "¬" FOR "%"
2) C00014 ENDMK
***************
**** File 1) FORMAT[J,RED], Page 2 line 90
1) .<<%2CHAPTER {!}%*>>
1) . SKIP 4 <<was blank>>
1) .NAM←"NAME";
1) .nam1←"name";
**** File 2) FORMAT[LSP,JRA], Page 2 line 90
2) %2CHAPTER {!}%*
2) . SKIP 4 <<was blank>>
2) .NAM←↑"NAME";
2) .nam1←"name";
***************
**** File 1) FORMAT[J,RED], Page 2 line 96
1) %A{nam1}%*
1) .<<{NAM}%*>>
**** File 2) FORMAT[LSP,JRA], Page 2 line 96
2) ¬A{nam1}%*
2) .<<{NAM}%*>>
***************
**** File 1) FORMAT[J,RED], Page 2 line 165
1) .∂4{APPENDIX!}∂8{NAM}→{PAGE!}{ ⊃
1) . END ⊃
**** File 2) FORMAT[LSP,JRA], Page 2 line 165
2) ∂4{APPENDIX!}∂8{NAM}→{PAGE!}{ ⊃
2) . END ⊃
***************
**** File 1) FORMAT[J,RED], Page 2 line 197
1) .COUNT FOOTNOTE INLINE from 1 TO 99 BY 1 printing ⊂"%8#{FOOTNOTE}%*"⊃;
1) .AT "⊗↓" ENTRY "←" ⊂NEXT FOOTNOTE ;! ;
**** File 2) FORMAT[LSP,JRA], Page 2 line 197
2) .COUNT FOOTNOTE INLINE from 1 TO 99 BY 1 IN section printing ⊂"%8#{FOOTNOTE}%*"⊃;
2) .AT "⊗↓" ENTRY "←" ⊂NEXT FOOTNOTE ;! ;
***************
1) FORMAT[J,RED] and 2) FORMAT[LSP,JRA] 5-19-79 07:39 pages 2,2
**** File 1) FORMAT[J,RED], Page 3 line 1
1) .FOOTSEP ← "________________"
1) .SECNAME ← SSNUMBER ← SSNAME ← NULL
1) .<<ODD HEADING(%c{SSNUMBER},,{SSNAME} {PAGE}%*)>>
1) .<<EVEN HEADING(%c{PAGE} {SECNAME},,{SSNUMBER}%*)>>
1) .EVEry HEADING(,,%c{SECNAME} {page}%*)
1) .<<insert prefASS>>
1) .INSERT CONTENTS
**** File 2) FORMAT[LSP,JRA], Page 3 line 1
2) .TURN ON "¬" FOR "%"
2) .FOOTSEP ← "________________"
2) .SECNAME ← SSNUMBER ← SSNAME ← NULL
2) .ODD HEADING(¬c{SSNUMBER},,{SSNAME} {PAGE}¬*)
2) .EVEN HEADING(¬c{PAGE} {SECNAME},,{SSNUMBER}¬*)
2) .INSERT CONTENTS
***************